home *** CD-ROM | disk | FTP | other *** search
/ Celestin Apprentice 2 / Apprentice-Release2.iso / Tools / Languages / Icon 8.1 / msm-2 / iconc.sit / tproto.h < prev    next >
Encoding:
C/C++ Source or Header  |  1992-09-19  |  8.7 KB  |  157 lines  |  [TEXT/MPS ]
  1. /*
  2.  * Prototypes for functions in iconc.
  3.  */
  4. struct sig_lst   *add_sig    Params((struct code *sig, struct c_fnc *fnc));
  5. novalue           addlib     Params((char *libname));
  6. struct code      *alc_ary    Params((int n));
  7. int               alc_cbufs  Params((int num, nodeptr lifetime));
  8. int               alc_dtmp   Params((nodeptr lifetime));
  9. int               alc_itmp   Params((nodeptr lifetime));
  10. struct code      *alc_lbl    Params((char *desc, int flag));
  11. int               alc_sbufs  Params((int num, nodeptr lifetime));
  12. novalue           arth_anlz  Params((struct il_code *var1, struct il_code *var2,
  13.                                int *maybe_int, int *maybe_dbl, int *chk1,
  14.                                struct code **conv1p, int *chk2,
  15.                                struct code **conv2p));
  16. struct node      *aug_nd     Params((nodeptr op, nodeptr arg1, nodeptr arg2));
  17. struct node      *binary_nd  Params((nodeptr op, nodeptr arg1, nodeptr arg2));
  18. nodeptr           buildarray Params((nodeptr a, nodeptr lb, nodeptr e));
  19. novalue           callc_add  Params((struct c_fnc *cont));
  20. novalue           callo_add  Params((char *oper_nm, int ret_flag,
  21.                                struct c_fnc *cont, int need_cont,
  22.                                struct code *arglist, struct code *on_ret));
  23. struct node      *case_nd    Params((nodeptr loc_model, nodeptr expr,
  24.                                nodeptr cases));
  25. int               ccomp      Params((char *srcname, char *exename));
  26. novalue           cd_add     Params((struct code *cd));
  27. struct val_loc   *chk_alc    Params((struct val_loc *rslt, nodeptr lifetime));
  28. novalue           chkinv     Params((noargs));
  29. novalue           chkstrinv  Params((noargs));
  30. struct node      *c_str_leaf Params((int type,struct node *loc_model,
  31.                    char *c));
  32. novalue              codegen    Params((struct node *t));
  33. int               cond_anlz  Params((struct il_code *il, struct code **cdp));
  34. novalue           const_blks Params((noargs));
  35. struct val_loc   *cvar_loc   Params((char *name));
  36. int               do_inlin   Params((struct implement *impl, nodeptr n,
  37.                                int *sep_cont, struct op_symentry *symtab, int n_va));
  38. novalue              doiconx    Params((char *s));
  39. struct val_loc   *dtmp_loc   Params((int n));
  40. novalue           eval_arith Params((int indx1, int indx2, int *maybe_int,
  41.                                int *maybe_dbl));
  42. int               eval_cnv   Params((int typcd, int indx, int def,
  43.                                int *cnv_flags));
  44. int    eval_is    Params((int typcd,int indx));
  45. novalue           findcases  Params((struct il_code *il, int has_dflt,
  46.                                struct case_anlz *case_anlz));
  47. novalue           fix_fncs   Params((struct c_fnc *fnc));
  48. struct fentry    *flookup    Params((char *id));
  49. novalue           gen_inlin  Params((struct il_code *il, struct val_loc *rslt,
  50.                                struct code **scont_strt,
  51.                                struct code **scont_fail, struct c_fnc *cont,
  52.                                struct implement *impl, int nsyms,
  53.                                struct op_symentry *symtab, nodeptr n,
  54.                                int dcl_var, int n_va));
  55. int              getopr     Params((int ac, int *cc));
  56. struct gentry    *glookup    Params((char *id));
  57. novalue              hsyserr    Params((char **av, char *file));
  58. struct node      *i_str_leaf Params((int type,struct node *loc_model,char *c,
  59.                    int d));
  60. long              iconint    Params((char *image));
  61. struct code      *il_copy    Params((struct il_c *dest, struct val_loc *src));
  62. struct code      *il_cnv     Params((int typcd, struct il_code *src,
  63.                                struct il_c *dflt, struct il_c *dest));
  64. struct code      *il_dflt    Params((int typcd, struct il_code *src,
  65.                                struct il_c *dflt, struct il_c *dest));
  66. novalue           implproto  Params((struct implement *ip));
  67. novalue           init       Params((noargs));
  68. novalue           init_proc  Params((char *name));
  69. novalue           init_rec   Params((char *name));
  70. novalue           init_src   Params((noargs));
  71. novalue           install    Params((char *name,int flag));
  72. struct gentry    *instl_p    Params((char *name, int flag));
  73. struct node      *int_leaf   Params((int type,struct node *loc_model,int c));
  74. struct val_loc   *itmp_loc   Params((int n));
  75. struct node      *invk_main  Params((struct pentry *main_proc));
  76. struct node      *invk_nd    Params((struct node *loc_model, struct node *proc,
  77.                               struct node *args));
  78. novalue           invoc_grp  Params((char *grp));
  79. novalue           invocbl    Params((nodeptr op, int arity));
  80. struct node      *key_leaf   Params((nodeptr loc_model, char *keyname));
  81. novalue           liveness   Params((nodeptr n, nodeptr resumer,
  82.                               nodeptr *failer, int *gen));
  83. struct node      *list_nd    Params((nodeptr loc_model, nodeptr args));
  84. novalue           lnkdcl     Params((char *name));
  85. novalue              readdb     Params((char *db_name));
  86. struct val_loc   *loc_cpy    Params((struct val_loc *loc, int mod_access));
  87. novalue           mark_recs Params((struct fentry *fp, unsigned int *typ,
  88.                               int *num_offsets, int *offset, int *bad_recs));
  89. struct code      *mk_goto    Params((struct code *label));
  90. struct node      *multiunary Params((char *op, nodeptr loc_model,
  91.                                nodeptr oprnd));
  92. struct sig_act   *new_sgact  Params((struct code *sig, struct code *cd,
  93.                                struct sig_act *next));
  94. int               nextchar   Params((noargs));
  95. novalue           nfatal     Params((struct node *n, char *s1, char *s2));
  96. int               n_arg_sym  Params((struct implement *ip));
  97. novalue           outerfnc   Params((struct c_fnc *fnc));
  98. int               past_prms  Params((struct node *n));
  99. novalue           proccode   Params((struct pentry *proc));
  100. novalue           prt_fnc    Params((struct c_fnc *fnc));
  101. novalue           prt_frame  Params((char *prefix, int ntend, int n_itmp,
  102.                 int i, int j, int k));
  103. struct centry    *putlit     Params((char *image,int littype,int len));
  104. struct lentry    *putloc     Params((char *id,int id_type));
  105. novalue              quit       Params((char *msg));
  106. novalue              quitf      Params((char *msg,char *arg));
  107. novalue           recconstr  Params((struct rentry *r));
  108. novalue           resolve    Params((struct pentry *proc));
  109. unsigned int      round2     Params((unsigned int n));
  110. struct code      *sig_cd     Params((struct code *fail, struct c_fnc *fnc));
  111. novalue           src_file   Params((char *name));
  112. struct node      *sect_nd    Params((nodeptr op, nodeptr arg1, nodeptr arg2,
  113.                                nodeptr arg3));
  114. novalue           tfatal     Params((char *s1,char *s2));
  115. struct node      *to_nd      Params((nodeptr loc_model, nodeptr arg1,
  116.                                nodeptr arg2));
  117. struct node      *toby_nd    Params((nodeptr loc_model, nodeptr arg1,
  118.                                nodeptr arg2, nodeptr arg3));
  119. int               trans      Params((noargs));
  120. struct node      *tree1      Params((int type));
  121. struct node      *tree2      Params((int type,struct node *loc_model));
  122. struct node      *tree3      Params((int type,struct node *loc_model,
  123.                                struct node *c));
  124. struct node      *tree4      Params((int type, struct node *loc_model,
  125.                                struct node *c, struct node *d));
  126. struct node      *tree5      Params((int type, struct node *loc_model,
  127.                    struct node *c, struct node *d,
  128.                    struct node *e));
  129. struct node      *tree6      Params((int type,struct node *loc_model,
  130.                    struct node *c, struct node *d,
  131.                    struct node *e, struct node *f));
  132. novalue              tsyserr    Params((char *s));
  133. novalue              twarn      Params((char *s1,char *s2));
  134. struct code      *typ_chk    Params((struct il_code *var, int typcd));
  135. int               type_case  Params((struct il_code *il, int (*fnc)(),
  136.                                struct case_anlz *case_anlz));
  137. novalue           typeinfer  Params((noargs));
  138. struct node      *unary_nd   Params((nodeptr op, nodeptr arg));
  139. novalue           var_dcls   Params((noargs));
  140. int               varsubtyp  Params((unsigned int *typ,
  141.                                struct lentry **single));
  142. novalue              writecheck Params((int rc));
  143. novalue              yyerror    Params((int tok,struct node *lval,int state));
  144. int               yylex      Params((noargs));
  145. int               yyparse    Params((noargs));
  146. pointer        xmalloc    Params((long n));
  147.  
  148. #ifdef DeBug
  149. novalue symdump Params((noargs));
  150. novalue ldump   Params((struct lentry **lhash));
  151. novalue gdump   Params((noargs));
  152. novalue cdump   Params((noargs));
  153. novalue fdump   Params((noargs));
  154. novalue rdump   Params((noargs));
  155. #endif                    /* DeBug */
  156.  
  157.